home *** CD-ROM | disk | FTP | other *** search
/ Whiteline: Alpha / Whiteline Alpha.iso / tex / styles / stwsty / labeling.sty < prev    next >
Encoding:
Text File  |  1994-09-22  |  630 b   |  18 lines
  1. \def\labelinglabel#1{\sfb#1\hfil\sc@septext}
  2. \def\labeling{\@ifnextchar [{\@labeling}{\@labeling[]}}
  3. \def\@labeling[#1]#2{\def\sc@septext{#1}
  4.  \list{}{\settowidth{\labelwidth}{\sfb#2#1}
  5.  \leftmargin\labelwidth
  6.  \advance\leftmargin by \labelsep
  7.  \let\makelabel\labelinglabel}}
  8. \let\endlabeling\endlist
  9.  
  10. \def\notwendig#1{%
  11.         \global\let\mynext\relax
  12.         \csname if#1\endcsname\else
  13.                 \global\let\mynext\@@end
  14.                 \@latexerr{STB-Makro: \expandafter
  15.                         \string\csname #1\endcsname\space muss
  16.                         eingetragen werden!^^J}
  17.         \fi\mynext}
  18.